﻿
Public Class ReadSubscriptionResponse
    Inherits Core.WBSAPIResponse

    Private m_comment As String = Nothing
    Private m_expireDate As DateTime = Nothing

    ''' <summary>
    ''' Gets expiry date of the notification subscription for this user 
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public ReadOnly Property ExpireDate() As DateTime
        Get
            Return m_expireDate
        End Get
    End Property

    ''' <summary>
    ''' Gets the associated comment
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public ReadOnly Property Comment() As String
        Get
            Return m_comment
        End Get
    End Property


    ''' <summary>
    ''' for wbsapiconnector only
    ''' </summary>
    ''' <param name="status"></param>
    ''' <param name="expireDate"></param>
    ''' <param name="comment"></param>
    ''' <remarks></remarks>
    Friend Sub New(ByVal status As Core.StatusResponseEnum, _
                   ByVal expireDate As DateTime, _
                   ByVal comment As String)
        MyBase.New(status)

        m_expireDate = expireDate
        m_comment = comment
    End Sub


End Class